TOP
BYTE AA
INT IAA
BYTE BB
INT IBB
BYTE CC
INT ICC
INT IDD
BYTE DD
BEGINMAIN(AC,IAV)
MS 'BEGIN T04'
AA=+003
BB=AA
CC=AA!=BB
IF CC
	MS 'BYTE TRAN'
ENDIF
MS '111111111'
IAA=+12345
IBB=IAA
CC=IAA!=IBB
IF CC
	MS 'INT TRANS'
ENDIF
MS '222222222'
ICC=+00235
BB=ICC
AA=+235
CC=AA!=BB
IF CC
	MS 'INT TO BY'
ENDIF
MS '333333333'
IBB=AA
ICC=+00100
AA=+100
IBB=AA
CC=IBB!=ICC
IF CC
	MS 'BYT TO IN'
ENDIF
MS '444444444'
IAA=+00000
IBB=+00005
IBB=IAA-IBB
CC=IBB<=IAA
IF CC
ELSE
	MS 'INT<=.-<0'
ENDIF
MS '555555555'
CC=IBB<!IAA
IF CC
ELSE
	MS 'INT<!.-<0'
ENDIF
MS '666666666'
IAA=+00005
ICC=-IAA
CC=ICC!=IBB
IF CC
	MS 'INT=-INT.'
ENDIF
MS '777777777'
IAA=+10256
IBB=+00003
ICC=IAA*IBB
IDD=+30768
CC=IDD!=ICC
IF CC
	MS 'INTMUL+*+'
ENDIF
MS '888888888'
IBB=-IBB
ICC=IAA*IBB
IDD=-IDD
CC=IDD!=ICC
IF CC
	MS 'INTMUL+*-'
ENDIF
MS '999999999'
IAA=+00030
IBB=+00040
IAA=IAA*IBB
ICC=+01200
AA=ICC!=IAA
IF AA
	MS 'MUL.X=X*.'
ENDIF
MS '000000000'
IAA=+00030
IBB=IAA*IBB
AA=ICC!=IBB
IF AA
	MS 'MUL.X=.*X'
ENDIF
MS 'AAAAAAAAA'
IAA=IAA*IAA
ICC=+00900
AA=IAA!=ICC
IF AA
	MS 'MUL.X=X*X'
ENDIF
MS 'BBBBBBBBB'
IAA=+30003
IBB=+00003
ICC=+10001
IAA=IAA/IBB
AA=IAA!=ICC
IF AA
	MS 'DIV.X=X/.'
ENDIF
MS 'CCCCCCCCC'
IBB=IAA/IBB
ICC=+03703
AA=ICC!=IBB
IF AA
	MS 'DIV.X=./X'
ENDIF
MS 'DDDDDDDDD'
ICC=ICC/ICC
IAA=+00001
AA=IAA!=ICC
IF AA
	MS 'DIV.X=X/X'
ENDIF
MS 'EEEEEEEEE'
IAA=+10256
IBB=+00016
ICC=IAA/IBB
IDD=+00641;NO PUN INTENDED
CC=IDD!=ICC
IF CC
	MS 'INTDIV+/+'
ENDIF
MS 'FFFFFFFFF'
IBB=-IBB
ICC=IAA/IBB
IDD=-IDD
CC=IDD!=ICC
IF CC
	MS 'INTDIV+/-'
ENDIF
MS 'GGGGGGGGG'
IBB=+00017
ICC=IAA/IBB
IDD=+00603
CC=ICC!=IDD
IF CC
	MS 'FRCDIV+/+'
ENDIF
MS 'HHHHHHHHH'
IAA=-IAA
ICC=IAA/IBB
IDD=-IDD
CC=ICC!=IDD
IF CC
	MS 'FRCDIV-/+'
ENDIF
MS 'IIIIIIIII'
AA=+001
BB=+001
CC=AA&BB
IF CC
ELSE
	MS 'AND OR IF'
ENDIF
MS 'JJJJJJJJJ'
BB=+000
CC=AA&BB
IF CC
	MS 'AND (IF)0'
ENDIF
MS 'KKKKKKKKK'
CC=AA?BB
IF CC
ELSE
	MS 'OR 1V0...'
ENDIF
MS 'LLLLLLLLL'
AA=+000
CC=AA?BB
IF CC
	MS 'OR 0V0...'
ENDIF
MS 'MMMMMMMMM'
CC=!AA
IF CC
ELSE
	MS '"!"....01'
ENDIF
MS 'NNNNNNNNN'
BB=+001
CC=AA-BB
DD=!CC
IF DD
	MS '"!"....10'
ENDIF
MS 'END TEST '
MS '4 INT AR.'
ENDMAIN
BOTTOM

